home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 22 / Cream of the Crop 22.iso / program / asm32.zip / E32.ZIP / DOSSHELL.ASM < prev    next >
Assembly Source File  |  1996-08-26  |  1KB  |  64 lines
  1. ; DOSSHELL.ASM for E32 - Copyright (C) 1994 Douglas Herr
  2. ;  all rights reserved
  3.  
  4. include    model.inc
  5.  
  6. public    dosshell
  7. extrn    system:near
  8. extrn    insert:near
  9. extrn    isinsert:near
  10. extrn    tprintce:near
  11. extrn    ucursoron:near
  12. extrn    get_screen_data:near
  13. extrn    mouse_init:near
  14. extrn    locate:near
  15.  
  16. include    dataseg.inc
  17. extrn    dirty_bits:byte
  18. extrn    normal:byte, rows:byte
  19. extrn    cur_posn:word
  20. extrn    cursor:dword
  21. nul    db 0
  22. @curseg    ends
  23.  
  24. include    codeseg.inc
  25. dosshell    proc    near
  26.     mov    ax,0
  27.     int    33h
  28.     mov    dh,rows
  29.     inc    dh
  30.     xor    dl,dl
  31.     mov    ah,normal
  32.     lea    esi,nul
  33.     call    tprintce
  34.     call    ucursoron
  35.     call    isinsert
  36.     pushf
  37.     push    ds
  38.     pop    es
  39.     mov    ebx,esi
  40.     call    system
  41.     xor    eax,eax
  42.     popf
  43.     cmc
  44.     adc    eax,0
  45.     call    insert
  46.     or    dirty_bits,00110001b    ; redo top line & F-keys
  47.     call    get_screen_data
  48.     mov    dx,cur_posn
  49.     mov    al,rows
  50.     cmp    dh,al
  51.     jb    short d0
  52.  
  53.     mov    dh,al
  54. ;    dec    dh        ;  else move cursor to bottom of screen
  55.     mov    esi,cursor
  56.     call    locate
  57. d0:
  58.     call    mouse_init
  59.     ret
  60. dosshell    endp
  61.  
  62. @curseg    ends
  63.     end
  64.